home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / pswdprot / aboutbox.frm next >
Text File  |  1995-05-07  |  5KB  |  155 lines
  1. VERSION 2.00
  2. Begin Form Aboutbox 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "About Bitmap Screen Saver"
  6.    ClientHeight    =   4560
  7.    ClientLeft      =   1755
  8.    ClientTop       =   2190
  9.    ClientWidth     =   6420
  10.    ControlBox      =   0   'False
  11.    Height          =   4965
  12.    Left            =   1695
  13.    LinkTopic       =   "Form1"
  14.    MaxButton       =   0   'False
  15.    MinButton       =   0   'False
  16.    ScaleHeight     =   4560
  17.    ScaleWidth      =   6420
  18.    Top             =   1845
  19.    Width           =   6540
  20.    Begin TextBox Text7 
  21.       BackColor       =   &H00C0C0C0&
  22.       BorderStyle     =   0  'None
  23.       ForeColor       =   &H000000FF&
  24.       Height          =   285
  25.       Left            =   360
  26.       TabIndex        =   9
  27.       Text            =   "Text7"
  28.       Top             =   1320
  29.       Width           =   5655
  30.    End
  31.    Begin TextBox Text6 
  32.       BackColor       =   &H00C0C0C0&
  33.       BorderStyle     =   0  'None
  34.       ForeColor       =   &H000000FF&
  35.       Height          =   285
  36.       Left            =   360
  37.       TabIndex        =   8
  38.       Text            =   "Text6"
  39.       Top             =   1080
  40.       Width           =   5655
  41.    End
  42.    Begin TextBox Text5 
  43.       BackColor       =   &H00C0C0C0&
  44.       BorderStyle     =   0  'None
  45.       ForeColor       =   &H000000FF&
  46.       Height          =   285
  47.       Left            =   360
  48.       TabIndex        =   7
  49.       Text            =   "Text5"
  50.       Top             =   840
  51.       Width           =   5655
  52.    End
  53.    Begin TextBox Text4 
  54.       BackColor       =   &H00C0C0C0&
  55.       BorderStyle     =   0  'None
  56.       FontBold        =   -1  'True
  57.       FontItalic      =   0   'False
  58.       FontName        =   "MS Sans Serif"
  59.       FontSize        =   12
  60.       FontStrikethru  =   0   'False
  61.       FontUnderline   =   0   'False
  62.       ForeColor       =   &H00FF0000&
  63.       Height          =   300
  64.       Left            =   360
  65.       TabIndex        =   6
  66.       Text            =   "Text4"
  67.       Top             =   2040
  68.       Width           =   5655
  69.    End
  70.    Begin TextBox Text3 
  71.       BackColor       =   &H00C0C0C0&
  72.       BorderStyle     =   0  'None
  73.       FontBold        =   -1  'True
  74.       FontItalic      =   0   'False
  75.       FontName        =   "MS Sans Serif"
  76.       FontSize        =   12
  77.       FontStrikethru  =   0   'False
  78.       FontUnderline   =   0   'False
  79.       ForeColor       =   &H00FF0000&
  80.       Height          =   300
  81.       Left            =   360
  82.       TabIndex        =   5
  83.       Text            =   "Text3"
  84.       Top             =   1680
  85.       Width           =   5655
  86.    End
  87.    Begin TextBox Text2 
  88.       BackColor       =   &H00C0C0C0&
  89.       BorderStyle     =   0  'None
  90.       ForeColor       =   &H000000FF&
  91.       Height          =   255
  92.       Left            =   360
  93.       TabIndex        =   4
  94.       Text            =   "Text2"
  95.       Top             =   600
  96.       Width           =   5655
  97.    End
  98.    Begin SSPanel Panel3D2 
  99.       BackColor       =   &H00C0C0C0&
  100.       BevelOuter      =   1  'Inset
  101.       Caption         =   "Created by David D. Evans"
  102.       Font3D          =   0  'None
  103.       Height          =   852
  104.       Left            =   840
  105.       TabIndex        =   3
  106.       Top             =   2760
  107.       Width           =   4812
  108.    End
  109.    Begin TextBox Text1 
  110.       BackColor       =   &H00C0C0C0&
  111.       BorderStyle     =   0  'None
  112.       ForeColor       =   &H000000FF&
  113.       Height          =   255
  114.       Left            =   360
  115.       TabIndex        =   2
  116.       Text            =   "Text1"
  117.       Top             =   360
  118.       Width           =   5655
  119.    End
  120.    Begin SSCommand Command3D1 
  121.       Caption         =   "OK"
  122.       Font3D          =   4  'Inset w/heavy shading
  123.       Height          =   492
  124.       Left            =   2760
  125.       TabIndex        =   1
  126.       Top             =   3720
  127.       Width           =   972
  128.    End
  129.    Begin SSPanel Panel3D1 
  130.       BackColor       =   &H00C0C0C0&
  131.       BevelOuter      =   1  'Inset
  132.       Font3D          =   0  'None
  133.       Height          =   4332
  134.       Left            =   120
  135.       TabIndex        =   0
  136.       Top             =   120
  137.       Width           =   6132
  138.    End
  139. End
  140.  
  141. Sub Command3D1_Click ()
  142. Unload aboutbox
  143. End Sub
  144.  
  145. Sub Form_Load ()
  146. Text1.Text = "This screen saver expects the location of the BMP file to be "
  147. text2.Text = "hard coded into the program  The two password programs are"
  148. text5.Text = "expected to be in the C:\WINDOWS\SYSTEM directory."
  149. text6.Text = "Other screen scavers are available to display pictures"
  150. text7.Text = "in different file types.  The files stored can be in the format of "
  151. text3.Text = "JPEG (JPG), TIFF (TIF), GIF (GIF), PCX (PCX),"
  152. TEXT4.Text = "TARGA (TGA), BMP (BMP), and DIB (DIB)."
  153. End Sub
  154.  
  155.